home *** CD-ROM | disk | FTP | other *** search
/ CU Amiga Super CD-ROM 25 / CU Amiga Magazine's Super CD-ROM 25 (1998)(EMAP Images)(GB)(Track 1 of 2)[!][issue 1998-08].iso / CUCD / Programming / GMS / GMSDev / EModules / gms / files / objects.e < prev    next >
Encoding:
Text File  |  1998-03-15  |  1.0 KB  |  44 lines
  1. /*
  2. **  $VER: objects.e V1.0
  3. **
  4. **  Object definitions.
  5. **
  6. **  (C) Copyright 1996-1998 DreamWorld Productions.
  7. **      All Rights Reserved.
  8. */
  9.  
  10. OPT MODULE
  11. OPT EXPORT
  12. OPT PREPROCESS
  13.  
  14. MODULE 'gms/dpkernel/dpkernel','gms/system/register','gms/files/segments'
  15.  
  16. /****************************************************************************
  17. ** Object entries.
  18. */
  19.  
  20. OBJECT objectentry      /* Entry stucture for GetObjectList() */
  21.   name   :PTR TO CHAR   /* Pointer to the name, may be NULL */
  22.   object :LONG          /* Object is returned here */
  23. ENDOBJECT
  24.  
  25. OBJECT dataheader    /* Private structure for object headers */
  26.   type :LONG         /* Type of object, eg STRC, CODE, DATA */
  27.   next :LONG         /* Offset towards next object */
  28. ENDOBJECT
  29.  
  30. /*****************************************************************************
  31. ** Object-File.
  32. */
  33.  
  34. CONST VER_OBJECTFILE  = 1,
  35.       TAGS_OBJECTFILE = $FFFB0000 OR ID_OBJECTFILE
  36.  
  37. OBJECT objectfile
  38.   head[1]  :ARRAY OF head
  39.   source   :LONG
  40. ENDOBJECT
  41.  
  42. CONST OBJA_Source = 12 OR TAPTR
  43.  
  44.